home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Tools 2
/
Amiga Tools 2.iso
/
dfue
/
avmnfax
/
source
/
getpassword.avmsrc
< prev
next >
Wrap
Text File
|
1995-03-09
|
3KB
|
139 lines
startrecord=true
label=
nodetype=14
comment=This is a procedure which accepts 1 argument, a password
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=getpassword
nodetype=8
line1=procedure
line2=parse arg password
line3=count = 3 /* max of 3 times */
line4=if password = '' then return 1
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=getpasswordagain
nodetype=8
line1=count = count - 1
line2=if count = 0 then return 0 /* didn't get a good password */
line3=
line4=
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=1
filename='avm:voices/getpassword'
comment=Enter your password. End it with the # sign.
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=4
timeout=7
numkeys=10
untilkey=11
keyactiontype=0
keyactionaction=getpasskeydetected
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
timedoutactiontype=3
timedoutactionaction=
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=1
filename='avm:voices/passwordtimeout'
comment=You didn't enter a password or you didn't end it with the # sign.
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=0
nextactionaction=getpasswordagain
endrecord=true
startrecord=true
label=getpasskeydetected
nodetype=8
line1=if value = password then return 1
line2=
line3=
line4=
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=1
filename='avm:voices/passwordbad'
comment=You didn't enter the correct password.
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=0
nextactionaction=getpasswordagain
endrecord=true